Public Partial Class SimpleAddition
    Inherits System.Web.UI.UserControl

    Private _text As String

    <WebBrowsable()> _
    <Personalizable()> _
    Public Property Title() As String
        Get
            Return _text
        End Get
        Set(ByVal value As String)
            _text = value
            Label2.Text = value
        End Set
    End Property

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

    End Sub

    Protected Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Label1.Text = CType(TextBox1.Text, Integer) + CType(TextBox2.Text, Integer)
    End Sub
End Class